home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 January: Mac OS SDK / Dev.CD Jan 00 SDK1.toast / Development Kits / Mac OS / Navigation Services SDK / Examples / Sampler / Sampler ƒ / Common.c next >
Encoding:
Text File  |  1999-06-16  |  14.2 KB  |  568 lines  |  [TEXT/MPS ]
  1. /*
  2.     File:        Common.c
  3.  
  4.     Copyright:    © 1997-1998 by Apple Computer, Inc., all rights reserved.
  5.  
  6. */
  7.  
  8. //    
  9. //    You may incorporate this sample code into your applications
  10. //    without restriction. This sample code has been provided "AS
  11. //    IS" and the responsibility for its operation is 100% yours.
  12. //    You are not permitted to redistribute the source as "Apple
  13. //    sample code" after having made changes. If you're going to
  14. //    re-distribute the source, we require that you make it clear
  15. //    in the source that the code was descended from Apple sample
  16. //    code, but that you've made changes.
  17. //    
  18.  
  19. #pragma segment AppSeg
  20.  
  21. #ifndef __EVENTS__
  22. #include <Events.h>
  23. #endif
  24.  
  25. #ifndef __TRAPS__
  26. #include <Traps.h>
  27. #endif
  28.  
  29. #ifndef __ICONS__
  30. #include <Icons.h>
  31. #endif
  32.  
  33. #ifndef __GESTALT__
  34. #include <Gestalt.h>
  35. #endif
  36.  
  37. #ifndef Common_Defs
  38. #include "Common.h"
  39. #endif
  40.  
  41. extern short gInBackground;
  42.  
  43. // routines used for getting file path names:
  44. OSErr PPrepend(StringPtr dst,StringPtr src);
  45. void PAppend(StringPtr dst, StringPtr src);
  46.  
  47. TrapType GetTrapType(short theTrap);
  48. short NumToolboxTraps(void);
  49.  
  50.  
  51. // ********************************************************************************
  52. // *    ConcatPP()
  53. // ********************************************************************************
  54. unsigned char* ConcatPP(unsigned char* a, unsigned char* b)
  55. {
  56.     short i;    
  57.     for (i = 1;i <= b[0];i++)
  58.         a[++a[0]] = b[i];        
  59.     return (a);
  60. }
  61.  
  62.  
  63. // ********************************************************************************
  64. // *    FSSpecsEq()
  65. // ********************************************************************************
  66. Boolean FSSpecsEq(FSSpec* a,FSSpec* b)
  67. {
  68.     if (a->vRefNum != b->vRefNum)
  69.         return (false);
  70.     if (a->parID != b->parID)
  71.         return (false);
  72.     if (IUEqualString(a->name,b->name))
  73.         return (false);
  74.     return (true);
  75. }
  76.     
  77.     
  78. // ********************************************************************************
  79. // *    rnd()
  80. // *    Returns a 16-bit random number no large than 'max'.
  81. // ********************************************************************************
  82. static SInt16 rnd(SInt16 max)
  83. {
  84.     return ((UInt32) max * (UInt16) Random()) >> 16;
  85. }
  86.  
  87.  
  88. // ********************************************************************************
  89. // *    RandTween()
  90. // *    Returns an 8-bit number between low and high.
  91. // ********************************************************************************
  92. short RandTween(short low, short high)
  93. {
  94.     short result;
  95.     
  96.     result = Random() % (high + 1 - low);
  97.     if (result < 0)
  98.         result = -result;
  99.     result += low;
  100.     return(result);
  101. }
  102.     
  103.  
  104. // ********************************************************************************
  105. // *    GetItemStr()
  106. // ********************************************************************************
  107. unsigned char* GetItemStr(DialogPtr theDialog, short theItem, unsigned char* theString)
  108. {
  109.     Handle ahandle;
  110.     Rect arect;
  111.     short atype;
  112.     
  113.     GetDialogItem(theDialog,theItem,&atype,&ahandle,&arect);
  114.     GetDialogItemText(ahandle,theString);
  115.     return (theString);
  116. }
  117.  
  118.  
  119. // ********************************************************************************
  120. // *    PokeItemStr()
  121. // ********************************************************************************
  122. void PokeItemStr(DialogPtr theDialog, short theItem, unsigned char *theString)
  123. {
  124.     Handle     ahandle;
  125.     Rect     arect;
  126.     short     atype;
  127.     
  128.     GetDialogItem(theDialog,theItem,&atype,&ahandle,&arect);
  129.     SetDialogItemText(ahandle,theString);
  130. }
  131.  
  132.  
  133. // ********************************************************************************
  134. // *    PokeCtlVal()
  135. // ********************************************************************************
  136. void PokeCtlVal(DialogPtr theDialog, short theItem, short value)
  137. {
  138.     Handle     ahandle;
  139.     Rect     arect;
  140.     short    atype;
  141.     
  142.     GetDialogItem(theDialog,theItem,&atype,&ahandle,&arect);
  143.     SetControlValue((ControlHandle)ahandle,value);
  144. }
  145.  
  146.  
  147. // ********************************************************************************
  148. // *    PokeCtlHilite()
  149. // ********************************************************************************
  150. void PokeCtlHilite(DialogPtr theDialog, short theItem, short value)
  151. {
  152.     Handle     ahandle;
  153.     Rect     arect;
  154.     short     atype;
  155.     
  156.     GetDialogItem(theDialog,theItem,&atype,&ahandle,&arect);
  157.     HiliteControl((ControlHandle)ahandle,value);
  158. }
  159.  
  160.  
  161. // ********************************************************************************
  162. // *    MyP2CCopy()
  163. // ********************************************************************************
  164. char* MyP2CCopy(unsigned char* psrc, char* ctarget)
  165. {
  166.     short i;
  167.     for(i = 0;i < psrc[0];i++)
  168.         ctarget[i] = psrc[i + 1];    
  169.     ctarget[i] = 0;
  170.     return (ctarget);
  171. }
  172.  
  173.  
  174. // ********************************************************************************
  175. // *    MyC2PStr()
  176. // ********************************************************************************
  177. unsigned char* MyC2PStr(char* theStr)
  178. {
  179.     short i,length;
  180.  
  181.     for(i = 0;theStr[i];i++)
  182.         ;
  183.     length = i;
  184.     while(i)
  185.         {
  186.         theStr[i] = theStr[i - 1];
  187.         i--;
  188.         }
  189.     ((unsigned char*)theStr)[0] = length;
  190.     return ((unsigned char *)theStr);
  191. }
  192.  
  193.  
  194. // ********************************************************************************
  195. // *    MyP2CStr()
  196. // ********************************************************************************
  197. char* MyP2CStr(unsigned char* theStr)
  198. {
  199.     short i,length;
  200.     length = theStr[0];
  201.     for(i = 0;i < length;i++)
  202.         theStr[i] = theStr[i + 1];
  203.     theStr[length] = 0;
  204.     return ((char *)theStr);
  205. }
  206.  
  207.  
  208. // ********************************************************************************
  209. // *    DebugCStr()
  210. // ********************************************************************************
  211. void DebugCStr(char* msg)
  212. {
  213.     MyC2PStr(msg);
  214.     DebugStr((unsigned char*)msg);
  215.     MyP2CStr((unsigned char*)msg);
  216. }
  217.  
  218.  
  219. // ********************************************************************************
  220. // *    Str2OSType()
  221. // *    C strings only.
  222. // ********************************************************************************
  223. OSType Str2OSType(Str255 theStr)
  224. {
  225.     OSType num = 0;
  226.     num =  theStr[3] + (theStr[2] << 8) + (theStr[1] << 16) + (theStr[0] << 24);
  227.     return num;    
  228. }
  229.  
  230. // ********************************************************************************
  231. // *    MyStrLen()
  232. // *    C strings only.
  233. // ********************************************************************************
  234. long MyStrLen(char* s)
  235. {
  236.     long count=0;
  237.     while (*s++ != '\0') count++;
  238.     return count;
  239. }
  240.  
  241.  
  242. // ********************************************************************************
  243. // *    myStringToLong()
  244. // *    C strings only.
  245. // ********************************************************************************
  246. long myStringToLong(char* s)
  247. {
  248.     long n = 0;
  249.     short i;
  250.     
  251.     for (i=0;s[i]>='0' && s[i]<='9';i++)
  252.         n = 10*n + (s[i]-'0');
  253.     return n;
  254. }
  255.  
  256.  
  257. // ********************************************************************************
  258. // *    myStringToShort()
  259. // *    C strings only.
  260. // ********************************************************************************
  261. short myStringToShort(char* s)
  262. {
  263.     short n = 0;
  264.     short i;
  265.     
  266.     for(i=0;s[i]>='0' && s[i]<='9';i++)
  267.         n = 10*n + (s[i]-'0');
  268.     return n;
  269. }
  270.  
  271.  
  272. // ********************************************************************************
  273. // *    myStrCpy()
  274. // *    C strings only.
  275. // ********************************************************************************
  276. void myStrCpy(char* dst, char* src)
  277. {
  278.     while(*src != '\0')
  279.         *dst++ = *src++;
  280.     *dst = '\0';
  281. }
  282.  
  283.  
  284. // ********************************************************************************
  285. // *    myStrCat()
  286. // ********************************************************************************
  287. void myStrCat(char* dst, char* src)
  288. {
  289.     dst = dst + MyStrLen(dst);
  290.     myStrCpy(dst,src);
  291. }
  292.  
  293.  
  294. // ********************************************************************************
  295. // *    flag routines for KeyDown events..
  296. // ********************************************************************************
  297. Boolean OptionDown()    { return ModifierDown(optionKey); }
  298. Boolean ShiftDown()     { return ModifierDown(shiftKey); }
  299. Boolean CommandDown()    { return ModifierDown(cmdKey); }
  300. Boolean ControlDown()    { return ModifierDown(controlKey); }
  301.  
  302.  
  303. // *****************************************************************************
  304. // *
  305. // *    ModifierDown()
  306. // *
  307. // *****************************************************************************
  308. Boolean ModifierDown(short modifier)
  309. {
  310.     EventRecord    event;
  311.     (void) OSEventAvail(0,&event);
  312.     return ((event.modifiers & modifier) != 0);
  313. }
  314.  
  315.  
  316. // *****************************************************************************
  317. // *
  318. // *    hiliteTheButton()
  319. // *
  320. // *****************************************************************************
  321. void hiliteTheButton(DialogPtr theDialog, short whichItem)
  322. {
  323.     short        itemType = 0;
  324.     Handle        itemHdl;
  325.     Rect        itemRect;
  326.     long int     startTick;
  327.  
  328.     GetDialogItem(theDialog,whichItem,&itemType,&itemHdl,&itemRect);
  329.     HiliteControl((ControlHandle)itemHdl,1);
  330.     for (startTick=TickCount();TickCount()-startTick<kDelayTick;)
  331.         {} // do nothing...
  332.     HiliteControl((ControlHandle)itemHdl,kActive);
  333. }
  334.  
  335.  
  336. // *****************************************************************************
  337. // *
  338. // *    AdornButton()
  339. // *    
  340. // *****************************************************************************
  341. void AdornButton(DialogPtr theDialog, short whichItem)
  342. {
  343.     GrafPtr    oldPort;
  344.     Handle    itemH;
  345.     short    itemType;
  346.     Rect    itemRect;    
  347.     long     version = 0;
  348.     OSErr    theErr = noErr;
  349.  
  350.     theErr = Gestalt(gestaltSystemVersion,&version);
  351.     if (version <= 0x0760)        // this look is only for Systems after 7.6.0
  352.         {
  353.         GetPort(&oldPort);
  354.         
  355.         SetPort(theDialog);
  356.         GetDialogItem(theDialog,whichItem,&itemType,&itemH,&itemRect);
  357.         PenSize(3,3);
  358.         InsetRect(&itemRect,-4,-4);
  359.         FrameRoundRect(&itemRect,14,14);
  360.         
  361.         PenNormal();
  362.         SetPort(oldPort);
  363.         }
  364. }
  365.  
  366.  
  367. // *****************************************************************************
  368. // *
  369. // *    DrawIconSuite()
  370. // *
  371. // *    This routine draws the appropriate icon into 'destRect' based on the
  372. // *    'resID' of the icon suite.  The caller must set its port before calling
  373. // *    this routine.
  374. // *    
  375. // *****************************************************************************
  376. void DrawIconSuite(short resID, Rect destRect)
  377. { 
  378.     IconSelectorValue    iconType;
  379.     IconAlignmentType    align;
  380.     IconTransformType    transform;
  381.     OSErr                theErr = noErr;
  382.     Handle                iconSuiteHdl;
  383.     
  384.     iconType = svAllAvailableData;
  385.     theErr = GetIconSuite(&iconSuiteHdl,resID,iconType);
  386.     if ((theErr == noErr) && (iconSuiteHdl != nil))
  387.         {
  388.         align = atAbsoluteCenter;
  389.         transform = ttNone;
  390.         theErr = PlotIconSuite(&destRect,align,transform,iconSuiteHdl);
  391.         }
  392. }
  393.  
  394.  
  395. // ********************************************************************************
  396. // *
  397. // *    PAppend()
  398. // *
  399. // ********************************************************************************    
  400. void PAppend(StringPtr dst, StringPtr src)
  401. {
  402.     BlockMove(src + 1, dst + *dst + 1, *src);
  403.     *dst += *src;
  404. }
  405.  
  406.  
  407.  
  408. // ********************************************************************************
  409. // *
  410. // *    PPrepend()
  411. // *        or "Path Append": add 'src' to the end of 'dst'.
  412. // *    - Pascal strings only.
  413. // *
  414. // ********************************************************************************    
  415. OSErr PPrepend(StringPtr dst,StringPtr src)
  416. {
  417.     if(*dst + *src > 255)
  418.         return(-1);
  419.     
  420.     BlockMove(dst + 1, dst + *src + 1, *dst);
  421.     BlockMove(src + 1, dst + 1, *src);
  422.     *dst += *src;
  423.     
  424.     return(0);
  425. }
  426.  
  427.  
  428. // ********************************************************************************
  429. // *
  430. // *    PathNameFromDirID()
  431. // *
  432. // *    Creates a full or partial path name of a given file.
  433. // *    - Inputs 'dirID' and 'vRefNum' and outputs 'fullPathName'.
  434. // *    - fullPathLength = num characters requested.
  435. // *    - full = flag to make full path, rather than just the item name.
  436. // *
  437. // ********************************************************************************    
  438. OSErr PathNameFromDirID(long dirID,
  439.                         short vRefNum,
  440.                         StringPtr fullPathName,
  441.                         short maxPathLength,
  442.                         short full)
  443. {
  444.     DirInfo    block;
  445.     Str255    directoryName;
  446.     OSErr     theErr;
  447.  
  448.     fullPathName[0] = 0;
  449.  
  450.     block.ioDrParID = dirID;
  451.     block.ioNamePtr = directoryName;
  452.     do {
  453.         block.ioVRefNum = vRefNum;
  454.         block.ioFDirIndex = -1;
  455.         block.ioDrDirID = block.ioDrParID;
  456.         theErr = PBGetCatInfoSync((CInfoPBPtr)&block);
  457.         if (theErr)
  458.             return(theErr);
  459.         
  460.         PAppend(directoryName,(StringPtr)"\p:");
  461.         
  462.         if (fullPathName[0] + directoryName[0] >= maxPathLength)
  463.             return(-1);    // actual path name too long for the requested path name size
  464.             
  465.         PPrepend(fullPathName,directoryName);
  466.         }
  467.     while ((block.ioDrDirID != 2) && (full));
  468.         
  469.     return(0);
  470. }
  471.  
  472.  
  473. // *****************************************************************************
  474. // *
  475. // *    AdjustCursor()
  476. // *
  477. // *****************************************************************************
  478. void AdjustCursor(Point theLoc, RgnHandle theRgn)
  479. {    
  480.     WindowPtr    theWindow;
  481.     Document*    theDocument;
  482.     RgnHandle    arrowRgn, iBeamRgn, hiliteRgn;
  483.     Rect        theRect;
  484.     Point        thePoint;
  485.  
  486.     if (gInBackground)
  487.         return;
  488.  
  489.     arrowRgn = NewRgn();
  490.     SetRectRgn(arrowRgn,-32767,-32767,32767,32767);
  491.  
  492.     if ((theWindow = FrontWindow()) &&
  493.         (theDocument = IsDocumentWindow(theWindow)) &&
  494.         (theDocument->theTE != NULL))
  495.         {
  496.         SetPort(theWindow);
  497.  
  498.         iBeamRgn = NewRgn();
  499.         hiliteRgn = NewRgn();
  500.  
  501.         theRect = (**(theDocument->theTE)).viewRect;
  502.         LocalToGlobal((Point*)&(theRect.top));
  503.         LocalToGlobal((Point*)&(theRect.bottom));
  504.         RectRgn(iBeamRgn,&theRect);
  505.  
  506.         CopyRgn(theDocument->hiliteRgn,hiliteRgn);
  507.         thePoint.h = thePoint.v = 0;
  508.         LocalToGlobal(&thePoint);
  509.         OffsetRgn(hiliteRgn,thePoint.h,thePoint.v);
  510.  
  511.         DiffRgn(arrowRgn,hiliteRgn,arrowRgn);
  512.         DiffRgn(arrowRgn,iBeamRgn,arrowRgn);
  513.  
  514.         DiffRgn(iBeamRgn,hiliteRgn,iBeamRgn);
  515.  
  516.         if (PtInRgn(theLoc,iBeamRgn))
  517.             {
  518.             SetCursor(*GetCursor(iBeamCursor));
  519.             CopyRgn(iBeamRgn,theRgn);
  520.             }
  521.         else
  522.             {
  523.             if (PtInRgn(theLoc,hiliteRgn))
  524.                 {
  525.                 SetCursor(&qd.arrow);
  526.                 CopyRgn(hiliteRgn,theRgn);
  527.                 }
  528.             else
  529.                 {
  530.                 SetCursor(&qd.arrow);
  531.                 CopyRgn(arrowRgn,theRgn);
  532.                 }
  533.             }
  534.         
  535.         DisposeRgn(iBeamRgn);
  536.         DisposeRgn(hiliteRgn);
  537.         }
  538.     else
  539.         {
  540.         SetCursor(&qd.arrow);
  541.         CopyRgn(arrowRgn,theRgn);
  542.         }
  543.  
  544.     DisposeRgn(arrowRgn);
  545. }
  546.  
  547.  
  548. OSErr AEGetDescData(const AEDesc *desc, DescType *typeCode, void *dataBuffer, ByteCount maximumSize, ByteCount *actualSize)
  549. {
  550.     *typeCode = desc->descriptorType;
  551.     Handle h = (Handle)desc->dataHandle;
  552.     ByteCount dataSize = GetHandleSize(h);
  553.     if (dataSize > maximumSize)
  554.         *actualSize = maximumSize;
  555.     else
  556.         *actualSize = dataSize;
  557.     BlockMoveData(*h, dataBuffer, *actualSize);
  558.     return noErr;
  559. }
  560.  
  561. void DoLowMemAlert( )
  562. {
  563.     Str255 message;
  564.     GetIndString( message, rAppStringsID, sLowMemoryErr );
  565.     ParamText( (ConstStr255Param)message, "\p", "\p", "\p" );
  566.     InitCursor( );
  567.     (void)NoteAlert( rGenericAlertID, 0L );
  568. }